home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / i13b1.exe / IALIASES.TXT < prev    next >
Encoding:
INI File  |  1997-02-09  |  32.3 KB  |  783 lines
  1. [Aliases]
  2. n0=/f1 {
  3. n1=  set %helphile $$?="Inferno or mIRC help?"
  4. n2=  if %helphile == inferno { run leetpad [ $mircdir $+ ifaq.txt ] }
  5. n3=  else run winhelp [ $mircdir $+ mirc.hlp ]
  6. n4=}
  7. n5=/f2 {
  8. n6=  //say /ctcp $me xdcc list or xdcc send #X
  9. n7=}
  10. n8=/f3 //titlebar -[( NetHak (F4): $+ %sop $+ \Away: $+ %away $+ \Sends: $+ $send(0) $+ \Gets: $+ $get(0) $+ \Chans: $+ $chan(0) $+ \Chats: $+ $chat(0) )]-
  11. n9=/f4 /set %sop $$?="Try to deop on serverops? [on|off]"
  12. n10=/f5 /say 4 $+ $$?="Who to MSG to." $+ : $$?="What U wanna say?"
  13. n11=/f12 {
  14. n12=  echo 2,13 $+ {I} It is now $time on $adate $+ .
  15. n13=  echo 12,11 $+ {I} %f12
  16. n14=  echo 9,1 $+ {I} %text
  17. n15=}
  18. n16=/findxdcc {
  19. n17=  set %plugchan #
  20. n18=  set %plugact $active
  21. n19=  play -c c:\inferno\plugins\findxdcc.plg
  22. n20=}
  23. n21=/reet {
  24. n22=  set %pluginfo *1
  25. n23=  set %plugchan #
  26. n24=  set %plugact $active
  27. n25=  play -c c:\inferno\plugins\reet.plg
  28. n26=}
  29. n27=/email {
  30. n28=  if %email != $null { run %email }
  31. n29=}
  32. n30=/www {
  33. n31=  if %www != $null { run %www }
  34. n32=}
  35. n33=/ftp {
  36. n34=  if %ftp != $null { run %ftp }
  37. n35=}
  38. n36=/getstats { 
  39. n37=  set %pluginfo *1
  40. n38=  set %plugchan #
  41. n39=  set %plugact $active
  42. n40=  play -c %plugact c:\inferno\plugins\getstats.plg
  43. n41=}
  44. n42=/sendstats { 
  45. n43=  set %pluginfo *1
  46. n44=  set %plugchan #
  47. n45=  set %plugact $active
  48. n46=  play -c $me c:\inferno\plugins\sendstat.plg
  49. n47=}
  50. n48=/klugs {
  51. n49=  set %failsafe start nutha end
  52. n50=  if $1 !isin %failsafe { echo 5 $active {I} Usage: /klugs $replace(%failsafe,$chr(32),|)  | halt }
  53. n51=  set %klugschan #
  54. n52=  goto klugs $+ $1
  55. n53=  :klugsstart
  56. n54=  unset %ptsevery 
  57. n55=  timer 1 3 /say -[( You are playing with Klugs v1.4 by Webrunner and R-66Y )]-
  58. n56=  timer 1 5 /say -[( Welcome to ANOTHER mind-bending game of KLUGS! )]-
  59. n57=  timer 1 7 /say -[( To start off, we'll give you an easy werd. )]-
  60. n58=  timer 1 9 /say -[( All YOU have to do is tell us what it is. )]-
  61. n59=  timer 1 11 /say -[( This game is SOMEWHAT like Jumble! )]-
  62. n60=  timer 1 13 /say -[( /ctcp $me klugs <THE ACTUAL WERD> to guess )]-
  63. n61=  timer 1 15  /say -[( Type /ctcp $me KLUE to get a clue )]-  
  64. n62=  timer 1 17 /say -[( Type /ctcp $me LETTER To see the first letter )]-
  65. n63=  timer 1 18 /say -[( Type /ctcp $me LAST to see the last letter )]-
  66. n64=  inc %werdz 1
  67. n65=  set %word $$?="What the ACTUAL werd?"
  68. n66=  set %klue $$?="A klue?"
  69. n67=  set %goback klugs1
  70. n68=  goto skramble
  71. n69=  :klugs1
  72. n70=  timer 1 13 say -[( The werd is: $upper(%werd) )]-
  73. n71=  topic %klugschan $upper(%werd) -[( New Game )]-
  74. n72=  timer 1 13 say -[( Da word is $len(%werd) letterz long btw )]-  
  75. n73=  set %1stletter $left(1,%word)
  76. n74=  set %lstletter $right(1,%word)
  77. n75=  enable #klugs
  78. n76=  goto klugswaiting
  79. n77=  :klugsnutha
  80. n78=  inc %werdz 1
  81. n79=  set %word $$?="What the ACTUAL werd?"
  82. n80=  set %klue $$?="A klue?"
  83. n81=  set %goback klugs2
  84. n82=  goto skramble
  85. n83=  :klugs2
  86. n84=  say -[( Alrighty!  For werd %# $+ %werdz $+ : $upper(%werd) )]-
  87. n85=  say -[( Da word is $len(%werd) letterz long btw )]-
  88. n86=  say -[( Same deal! /ctcp $me klugs <THE ACTUAL WERD> to guess )]-
  89. n87=  say -[( Type /ctcp $me KLUE to get a clue )]-
  90. n88=  say -[( Type /ctcp $me LETTER To see the first letter )]- 
  91. n89=  say -[( type /ctcp $me LAST to see the last letter )]-
  92. n90=  set %1stletter $left(1,%word)
  93. n91=  set %lstletter $right(1,%word)
  94. n92=  topic %klugschan $upper(%werd) -[( $+ %ptsevery $+ )]-
  95. n93=  enable #klugs
  96. n94=  goto klugswaiting
  97. n95=  :klugsend
  98. n96=  say -[( THANX FER PLAYING KLUGS EVERYONE! )]-
  99. n97=  topic %klugschan klugs GAME OVER  %ptsevery 
  100. n98=  say da final skore: %ptsevery
  101. n99=  unset % $+ * $+ points
  102. n100=  unset %werd
  103. n101=  unset %werdz
  104. n102=  unset %word
  105. n103=  disable #klugs
  106. n104=  halt
  107. n105=  :skramble
  108. n106=  set %finish ^
  109. n107=  set %sward @ $+ %word $+ @
  110. n108=  :repeat
  111. n109=  %lenof = $len(%sward) - 1
  112. n110=  %rand = $rand(2,%lenof)
  113. n111=  %letter = $mid(%rand,1,%sward)
  114. n112=  %pos = $len(%sward) - %rand
  115. n113=  %pos2 = %rand - 1
  116. n114=  %finish = %finish $+ %letter
  117. n115=  %sward = $left(%pos2,%sward) $+ $right(%pos,%sward)
  118. n116=  if %sward == @@   {
  119. n117=    %finish = $remove(%finish,^)
  120. n118=    set %werd %finish 
  121. n119=    goto %goback
  122. n120=  } 
  123. n121=  goto repeat
  124. n122=  :klugswaiting
  125. n123=  echo 4 $active -[( Waiting fer that werd )]-
  126. n124=}
  127. n125=/ascii {
  128. n126=  set %ascii $$dir="Which ASCII?" [ $mircdir $+ \extras\ ]
  129. n127=  set %asciispeed $$?="What speed?"
  130. n128=  play %ascii %asciispeed
  131. n129=  unset %ascii*
  132. n130=}
  133. n131=/ipic /play c:\inferno\extras\inferno.txt 2750
  134. n132=/setidle {
  135. n133=  unset %idle*  
  136. n134=  set %idletime $$?="In minutes, how long until you idle out?"
  137. n135=  %idletime = { %idletime * 60 }
  138. n136=  %idletime2 = { %idletime / 60 }
  139. n137=  echo 3 {I} Idletime set to %idletime2 minutes.
  140. n138=}
  141. n139=/delmail {
  142. n140=  if $1 == $null { echo 1,9 {I} Usage: /delmail <NICK (UP TO 8 CHARACTERS)> | halt }
  143. n141=  else /remove c:\inferno\mail\ $+ $1 $+ .iml
  144. n142=}
  145. n143=/newmail {
  146. n144=  if $1 == $null { echo 9,1 {I} Usage: /newmail <NICK (UP TO 8 CHARACTERS)> <MESSAGE> | halt }
  147. n145=  else /write c:\inferno\mail\ $+ $1 $+ .iml *2
  148. n146=}
  149. n147=/fm {
  150. n148=  if $2 == $null { echo 3 -a {I} Usage: /fm <SOMETHING> [+|-] <SOMETHING> = <WHAT THEY EQUAL> | halt }
  151. n149=  else goto start
  152. n150=  halt
  153. n151=  :start
  154. n152=  say {MAtH} *1
  155. n153=  :done
  156. n154=  halt
  157. n155=}
  158. n156=/tkpkoff {
  159. n157=  if ($1 == $null) { echo 4 -a {I} Usage: /tkpkoff <PACK NUMBER> | halt }
  160. n158=  else set %packoff $$1
  161. n159=  %packleached = { %packleached - [ % $+ [ pack $+ [ $$1 $+ [ size ] ] ] ] }
  162. n160=  dec [ % $+ [ pack $+ [ $$1 $+ [ gets ] ] ] ]  1 
  163. n161=}
  164. n162=/xdcc1 {
  165. n163=  if $1 == $null { echo  $+ $r(1,15) $+ , $+ $r(1,15) $+ {I} Usage: /xdcc [stop|setup|offer] | halt }
  166. n164=  else goto xdcc $+ $1
  167. n165=  :xdccstop
  168. n166=  timer45 off  
  169. n167=  disable #1pack
  170. n168=  unset %pack*
  171. n169=  goto xdccend
  172. n170=  :xdccsetup
  173. n171=  enable #1pack
  174. n172=  set %packleached 0
  175. n173=  set %packs 1
  176. n174=  set %pack1 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  177. n175=  %pack1size = $lof(%pack1)
  178. n176=  %pack1size = %pack1size / 1000
  179. n177=  set %packsize %pack1size
  180. n178=  set %pack1gets 0
  181. n179=  %pack1desc = $nopath(%pack1)
  182. n180=  set %pack1desc1 $$?="What does the pack DO?"
  183. n181=  set %pack1extra $$?="Any more info?"
  184. n182=  set %packslot $$?="How many slots?"
  185. n183=  set %packleached 0
  186. n184=  set %packslots { %packslot - $send(0) }
  187. n185=  :xdccoffer
  188. n186=  set %packslots { %packslot - $send(0) }
  189. n187=  amsg  $+ %packs $+  packs offered with  $+ %packslots $+  of  $+ %packslot $+  slots open.
  190. n188=  amsg Total offered-[ $+ %packsize $+ k $+ ]  
  191. n189=  amsg  $+ Type /ctcp $me XDCC LIST fo my list, /ctcp $me XDCC SEND #X fo a send. $+ 
  192. n190=  if %pack1extra != no { amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ] | amsg áá^- %pack1extra }
  193. n191=  else {
  194. n192=    amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ]
  195. n193=  }
  196. n194=  if %packleached >= 1000 { set %packleached { %packleached / 1000 } | amsg Total leached-[ $+ %packleached $+ mb $+ ]- $+ %inferno $+  |     amsg XDCC LIST generated by %inferno by R-66Y and [eXo] }
  197. n195=  else {
  198. n196=    amsg Total leached-[ $+ %packleached $+ k $+ ]- $+ %inferno $+ 
  199. n197=    amsg XDCC LIST generated by %inferno by R-66Y and [eXo]
  200. n198=    timer45 0 400 /xdcc5 offer
  201. n199=    halt
  202. n200=  }
  203. n201=  :xdccend
  204. n202=  echo 4 $active Thanx fer using %inferno
  205. n203=}
  206. n204=/xdcc2 {
  207. n205=  if $1 == $null { echo  $+ $r(1,15) $+ , $+ $r(1,15) $+ {I} Usage: /xdcc2 [stop|setup|offer] | halt }
  208. n206=  else goto xdcc2 $+ $$1 
  209. n207=  :xdcc2stop
  210. n208=  timer45 off
  211. n209=  disable #2pack
  212. n210=  unset %pack*
  213. n211=  goto xdcc2end
  214. n212=  :xdcc2setup
  215. n213=  enable #2pack
  216. n214=  inc %packs 1
  217. n215=  set %pack1 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  218. n216=  %pack1size = $lof(%pack1)
  219. n217=  %pack1size = %pack1size / 1000
  220. n218=  set %pack1gets 0
  221. n219=  %pack1desc = $nopath(%pack1)
  222. n220=  set %pack1desc1 $$?="What does the pack DO?"
  223. n221=  set %pack1extra $$?="Any more info?"
  224. n222=  inc %packs 1
  225. n223=  set %pack2 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  226. n224=  %pack2size = $lof(%pack2)
  227. n225=  %pack2size = %pack2size / 1000
  228. n226=  set %packsize { %pack1size + %pack2size }
  229. n227=  set %pack2gets 0
  230. n228=  %pack2desc = $nopath(%pack2)
  231. n229=  set %pack2desc1 $$?="What does the pack DO?"
  232. n230=  set %pack2extra $$?="Any more info?"
  233. n231=  set %packslot $$?="How many slots?"
  234. n232=  set %packleached 0
  235. n233=  set %packslots { %packslot - $send(0) }
  236. n234=  :xdcc2offer
  237. n235=  set %packslots { %packslot - $send(0) }
  238. n236=  amsg  $+ %packs $+  packs offered with  $+ %packslots $+  of  $+ %packslot $+  slots open.
  239. n237=  amsg Total offered-[ $+ %packsize $+ k $+ ]  
  240. n238=  amsg  $+ Type /ctcp $me XDCC LIST fo my list, /ctcp $me XDCC SEND #X fo a send. $+ 
  241. n239=  if %pack1extra != no { amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ] | amsg áá^- %pack1extra }
  242. n240=  else {
  243. n241=    amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ]
  244. n242=  }
  245. n243=  if %pack2extra != no { amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ] | amsg áá^- %pack2extra }
  246. n244=  else {
  247. n245=    amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ]
  248. n246=  }
  249. n247=  if %packleached >= 1000 { set %packleached { %packleached / 1000 } | amsg Total leached-[ $+ %packleached $+ mb $+ ]- $+ %inferno $+  |     amsg XDCC LIST generated by %inferno by R-66Y and [eXo] }
  250. n248=  else {
  251. n249=    amsg Total leached-[ $+ %packleached $+ k $+ ]- $+ %inferno $+ 
  252. n250=    amsg XDCC LIST generated by %inferno by R-66Y and [eXo]
  253. n251=    timer45 0 400 /xdcc5 offer
  254. n252=    halt
  255. n253=  }
  256. n254=  :xdcc2end
  257. n255=  echo 4 $active Thanx fer using %inferno
  258. n256=}
  259. n257=/xdcc3 {
  260. n258=  if $1 == $null { echo  $+ $r(1,15) $+ , $+ $r(1,15) $+ {I} Usage: /xdcc3 [stop|setup|offer] | halt }
  261. n259=  else goto xdcc3 $+ $$1 
  262. n260=  :xdcc3stop
  263. n261=  timer45 off
  264. n262=  disable #3pack
  265. n263=  unset %pack*
  266. n264=  goto xdcc3end
  267. n265=  :xdcc3setup
  268. n266=  enable #3pack
  269. n267=  inc %packs 1
  270. n268=  set %pack1 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  271. n269=  %pack1size = $lof(%pack1)
  272. n270=  %pack1size = %pack1size / 1000
  273. n271=  set %pack1gets 0
  274. n272=  %pack1desc = $nopath(%pack1)
  275. n273=  set %pack1desc1 $$?="What does the pack DO?"
  276. n274=  set %pack1extra $$?="Any more info?"
  277. n275=  inc %packs 1
  278. n276=  set %pack2 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  279. n277=  %pack2size = $lof(%pack2)
  280. n278=  %pack2size = %pack2size / 1000
  281. n279=  set %pack2gets 0
  282. n280=  %pack2desc = $nopath(%pack2)
  283. n281=  set %pack2desc1 $$?="What does the pack DO?"
  284. n282=  set %pack2extra $$?="Any more info?"
  285. n283=  inc %packs 1
  286. n284=  set %pack3 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  287. n285=  %pack3size = $lof(%pack3)
  288. n286=  %pack3size = %pack3size / 1000
  289. n287=  set %packsize { %pack1size + %pack2size }
  290. n288=  set %packsize1 { %packsize + %pack3size }
  291. n289=  set %pack3gets 0
  292. n290=  %pack3desc = $nopath(%pack3)
  293. n291=  set %pack3desc1 $$?="What does the pack DO?"
  294. n292=  set %pack3extra $$?="Any more info?"
  295. n293=  set %packslot $$?="How many slots?"
  296. n294=  set %packleached 0
  297. n295=  set %packslots { %packslot - $send(0) }
  298. n296=  :xdcc3offer
  299. n297=  set %packslots { %packslot - $send(0) }
  300. n298=  amsg  $+ %packs $+  packs offered with  $+ %packslots $+  of  $+ %packslot $+  slots open.
  301. n299=  amsg Total offered-[ $+ %packsize1 $+ k $+ ]  
  302. n300=  amsg  $+ Type /ctcp $me XDCC LIST fo my list, /ctcp $me XDCC SEND #X fo a send. $+ 
  303. n301=  if %pack1extra != no { amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ] | amsg áá^- %pack1extra }
  304. n302=  else {
  305. n303=    amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ]
  306. n304=  }
  307. n305=  if %pack2extra != no { amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ] | amsg áá^- %pack2extra }
  308. n306=  else {
  309. n307=    amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ]
  310. n308=  }
  311. n309=  if %pack3extra != no { amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ] | amsg áá^- %pack3extra }
  312. n310=  else {
  313. n311=    amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ]
  314. n312=  }
  315. n313=  if %packleached >= 1000 { set %packleached { %packleached / 1000 } | amsg Total leached-[ $+ %packleached $+ mb $+ ]- $+ %inferno $+  |     amsg XDCC LIST generated by %inferno by R-66Y and [eXo] }
  316. n314=  else {
  317. n315=    amsg Total leached-[ $+ %packleached $+ k $+ ]- $+ %inferno $+ 
  318. n316=    amsg XDCC LIST generated by %inferno by R-66Y and [eXo]
  319. n317=    timer45 0 400 /xdcc5 offer
  320. n318=    halt
  321. n319=  }
  322. n320=  :xdcc3end
  323. n321=  echo 4 $active Thanx fer using %inferno
  324. n322=}
  325. n323=/xdcc4 {
  326. n324=  if $1 == $null { echo  $+ $r(1,15) $+ , $+ $r(1,15) $+ {I} Usage: /xdcc4 [stop|setup|offer] | halt }
  327. n325=  else goto xdcc4 $+ $$1 
  328. n326=  :xdcc4stop
  329. n327=  timer45 off
  330. n328=  disable #4pack
  331. n329=  unset %pack*
  332. n330=  goto xdcc4end
  333. n331=  :xdcc4setup
  334. n332=  enable #4pack
  335. n333=  inc %packs 1
  336. n334=  set %pack1 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  337. n335=  %pack1size = $lof(%pack1)
  338. n336=  %pack1size = %pack1size / 1000
  339. n337=  set %pack1gets 0
  340. n338=  %pack1desc = $nopath(%pack1)
  341. n339=  set %pack1desc1 $$?="What does the pack DO?"
  342. n340=  set %pack1extra $$?="Any more info?"
  343. n341=  inc %packs 1
  344. n342=  set %pack2 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  345. n343=  %pack2size = $lof(%pack2)
  346. n344=  %pack2size = %pack2size / 1000
  347. n345=  set %pack2gets 0
  348. n346=  %pack2desc = $nopath(%pack2)
  349. n347=  set %pack2desc1 $$?="What does the pack DO?"
  350. n348=  set %pack2extra $$?="Any more info?"
  351. n349=  inc %packs 1
  352. n350=  set %pack3 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  353. n351=  %pack3size = $lof(%pack3)
  354. n352=  %pack3size = %pack3size / 1000
  355. n353=  set %pack3gets 0
  356. n354=  %pack3desc = $nopath(%pack3)
  357. n355=  set %pack3desc1 $$?="What does the pack DO?"
  358. n356=  set %pack3extra $$?="Any more info?"
  359. n357=  inc %packs 1
  360. n358=  set %pack4 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  361. n359=  %pack4size = $lof(%pack4)
  362. n360=  %pack4size = %pack4size / 1000
  363. n361=  set %pack4gets 0
  364. n362=  %pack4desc = $nopath(%pack4)
  365. n363=  set %pack4desc1 $$?="What does the pack DO?"
  366. n364=  set %pack4extra $$?="Any more info?"
  367. n365=  set %packsize { %pack1size + %pack2size }  
  368. n366=  set %packsize1 { %packsize + %pack3size }
  369. n367=  set %packsize2 { %packsize1 + %pack4size }
  370. n368=  set %packslot $$?="How many slots?"
  371. n369=  set %packleached 0
  372. n370=  set %packslots { %packslot - $send(0) }
  373. n371=  :xdcc4offer
  374. n372=  set %packslots { %packslot - $send(0) }
  375. n373=  amsg  $+ %packs $+  packs offered with  $+ %packslots $+  of  $+ %packslot $+  slots open.
  376. n374=  amsg Total offered-[ $+ %packsize2 $+ k $+ ]  
  377. n375=  amsg  $+ Type /ctcp $me XDCC LIST fo my list, /ctcp $me XDCC SEND #X fo a send. $+ 
  378. n376=  if %pack1extra != no { amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ] | amsg áá^- %pack1extra }
  379. n377=  else {
  380. n378=    amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ]
  381. n379=  }
  382. n380=  if %pack2extra != no { amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ] | amsg áá^- %pack2extra }
  383. n381=  else {
  384. n382=    amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ]
  385. n383=  }
  386. n384=  if %pack3extra != no { amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ] | amsg áá^- %pack3extra }
  387. n385=  else {
  388. n386=    amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ]
  389. n387=  }
  390. n388=  if %pack4extra != no { amsg #4-[ $+ %pack4size $+ k $+ ]- $+ %pack4gets $+ x $+ -[ $+ %pack4desc - %pack4desc1 $+ ] | amsg áá^- %pack4extra }
  391. n389=  else {
  392. n390=    amsg #4-[ $+ %pack4size $+ k $+ ]- $+ %pack4gets $+ x $+ -[ $+ %pack4desc - %pack4desc1 $+ ]
  393. n391=  }
  394. n392=  if %packleached >= 1000 { set %packleached { %packleached / 1000 } | amsg Total leached-[ $+ %packleached $+ mb $+ ]- $+ %inferno $+  |     amsg XDCC LIST generated by %inferno by R-66Y and [eXo] }
  395. n393=  else {
  396. n394=    amsg Total leached-[ $+ %packleached $+ k $+ ]- $+ %inferno $+ 
  397. n395=    amsg XDCC LIST generated by %inferno by R-66Y and [eXo]
  398. n396=    timer45 0 400 /xdcc5 offer
  399. n397=    halt
  400. n398=  }
  401. n399=  :xdcc4end
  402. n400=  echo 4 $active Thanx fer using %inferno
  403. n401=}
  404. n402=/xdcc5 {
  405. n403=  if $1 == $null { echo  $+ $r(1,15) $+ , $+ $r(1,15) $+ {I} Usage: /xdcc5 [stop|setup|offer] | halt }
  406. n404=  else goto xdcc5 $+ $$1 
  407. n405=  :xdcc5stop
  408. n406=  timer45 off
  409. n407=  disable #5pack
  410. n408=  unset %pack*
  411. n409=  goto xdcc5end
  412. n410=  :xdcc5setup
  413. n411=  enable #5pack
  414. n412=  inc %packs 1
  415. n413=  set %pack1 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  416. n414=  %pack1size = $lof(%pack1)
  417. n415=  %pack1size = %pack1size / 1000
  418. n416=  set %pack1gets 0
  419. n417=  %pack1desc = $nopath(%pack1)
  420. n418=  set %pack1desc1 $$?="What does the pack DO?"
  421. n419=  set %pack1extra $$?="Any more info?"
  422. n420=  inc %packs 1
  423. n421=  set %pack2 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  424. n422=  %pack2size = $lof(%pack2)
  425. n423=  %pack2size = %pack2size / 1000
  426. n424=  set %pack2gets 0
  427. n425=  %pack2desc = $nopath(%pack2)
  428. n426=  set %pack2desc1 $$?="What does the pack DO?"
  429. n427=  set %pack2extra $$?="Any more info?"
  430. n428=  inc %packs 1
  431. n429=  set %pack3 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  432. n430=  %pack3size = $lof(%pack3)
  433. n431=  %pack3size = %pack3size / 1000
  434. n432=  set %pack3gets 0
  435. n433=  %pack3desc = $nopath(%pack3)
  436. n434=  set %pack3desc1 $$?="What does the pack DO?"
  437. n435=  set %pack3extra $$?="Any more info?"
  438. n436=  inc %packs 1
  439. n437=  set %pack4 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  440. n438=  %pack4size = $lof(%pack4)
  441. n439=  %pack4size = %pack4size / 1000
  442. n440=  set %pack4gets 0
  443. n441=  %pack4desc = $nopath(%pack4)
  444. n442=  set %pack4desc1 $$?="What does the pack DO?"
  445. n443=  set %pack4extra $$?="Any more info?"
  446. n444=  inc %packs 1
  447. n445=  set %pack5 $$dir="Choose a phile." [ $mircdir $+ \xdcc\ ]
  448. n446=  %pack5size = $lof(%pack5)
  449. n447=  %pack5size = %pack5size / 1000
  450. n448=  set %pack5gets 0
  451. n449=  %pack5desc = $nopath(%pack5)
  452. n450=  set %pack5desc1 $$?="What does the pack DO?"
  453. n451=  set %pack5extra $$?="Any more info?"
  454. n452=  set %packsize { %pack1size + %pack2size }  
  455. n453=  set %packsize1 { %packsize + %pack3size }
  456. n454=  set %packsize2 { %packsize1 + %pack4size }
  457. n455=  set %packsize3 { %packsize2 + %pack5size }
  458. n456=  set %packslot $$?="How many slots?"
  459. n457=  set %packleached 0
  460. n458=  set %packslots { %packslot - $send(0) }
  461. n459=  :xdcc5offer
  462. n460=  set %packslots { %packslot - $send(0) }
  463. n461=  amsg  $+ %packs $+  packs offered with  $+ %packslots $+  of  $+ %packslot $+  slots open.
  464. n462=  amsg Total offered-[ $+ %packsize3 $+ k $+ ]  
  465. n463=  amsg  $+ Type /ctcp $me XDCC LIST fo my list, /ctcp $me XDCC SEND #X fo a send. $+ 
  466. n464=  if %pack1extra != no { amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ] | amsg áá^- %pack1extra }
  467. n465=  else {
  468. n466=    amsg #1-[ $+ %pack1size $+ k $+ ]- $+ %pack1gets $+ x $+ -[ $+ %pack1desc - %pack1desc1 $+ ]
  469. n467=  }
  470. n468=  if %pack2extra != no { amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ] | amsg áá^- %pack2extra }
  471. n469=  else {
  472. n470=    amsg #2-[ $+ %pack2size $+ k $+ ]- $+ %pack2gets $+ x $+ -[ $+ %pack2desc - %pack2desc1 $+ ]
  473. n471=  }
  474. n472=  if %pack3extra != no { amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ] | amsg áá^- %pack3extra }
  475. n473=  else {
  476. n474=    amsg #3-[ $+ %pack3size $+ k $+ ]- $+ %pack3gets $+ x $+ -[ $+ %pack3desc - %pack3desc1 $+ ]
  477. n475=  }
  478. n476=  if %pack4extra != no { amsg #4-[ $+ %pack4size $+ k $+ ]- $+ %pack4gets $+ x $+ -[ $+ %pack4desc - %pack4desc1 $+ ] | amsg áá^- %pack4extra }
  479. n477=  else {
  480. n478=    amsg #4-[ $+ %pack4size $+ k $+ ]- $+ %pack4gets $+ x $+ -[ $+ %pack4desc - %pack4desc1 $+ ]
  481. n479=  }
  482. n480=  if %pack5extra != no { amsg #5-[ $+ %pack5size $+ k $+ ]- $+ %pack5gets $+ x $+ -[ $+ %pack5desc - %pack5desc1 $+ ] | amsg áá^- %pack5extra }
  483. n481=  else {
  484. n482=    amsg #5-[ $+ %pack5size $+ k $+ ]- $+ %pack5gets $+ x $+ -[ $+ %pack5desc - %pack5desc1 $+ ]
  485. n483=  }
  486. n484=  if %packleached >= 1000 { set %packleached { %packleached / 1000 } | amsg Total leached-[ $+ %packleached $+ mb $+ ]- $+ %inferno $+  |     amsg XDCC LIST generated by %inferno by R-66Y and [eXo] }
  487. n485=  else {
  488. n486=    amsg Total leached-[ $+ %packleached $+ k $+ ]- $+ %inferno $+ 
  489. n487=    amsg XDCC LIST generated by %inferno by R-66Y and [eXo]
  490. n488=    timer45 0 400 /xdcc5 offer
  491. n489=    halt
  492. n490=  }
  493. n491=  :xdcc5end
  494. n492=  echo 4 $active Thanx fer using %inferno
  495. n493=}
  496. n494=/xdccnick {
  497. n495=  set %nick $me
  498. n496=  //nick $left(5,$me) $+ dCc
  499. n497=}
  500. n498=/nickbak {
  501. n499=  //nick %nick
  502. n500=  unset %nick
  503. n501=}
  504. n502=/math { 
  505. n503=  if ($2 !isin +-*/%) { 
  506. n504=    echo 1 $active {I} /math <NUMBER> [+|-|*|/|%] <NUMBER> [-s]
  507. n505=    halt 
  508. n506=  }
  509. n507=  if ($2 = /) { 
  510. n508=    %mathfinal = $1 $2 $3
  511. n509=    %mathtemp = $1 / $3
  512. n510=    %mathtemp = %mathtemp * $3
  513. n511=    %mathtemp = $1 - %mathtemp 
  514. n512=    if (s isin $4) { if (%mathtemp != 0) say {MAtH} $1 $2 $3 = %mathfinal %mathtemp $+ / $+ $3
  515. n513=      else say {MAtH} $1 $2 $3 = %mathfinal
  516. n514=    }
  517. n515=    else { 
  518. n516=      if (%mathtemp != 0) { 
  519. n517=        echo 3 $active {I} $1 $2 $3 = %mathfinal %mathtemp $+ / $+ $3 
  520. n518=      }
  521. n519=      else echo 3 $active {I} $1 $2 $3 = %mathfinal
  522. n520=    }
  523. n521=    unset %math*
  524. n522=    halt
  525. n523=  }
  526. n524=  else { 
  527. n525=    %mathfinal = $1 $2 $3
  528. n526=    if (s isin $4) { say {MAtH} $1 $2 $3 = %mathfinal 
  529. n527=    }
  530. n528=    else echo 3 $active {I} $1 $2 $3 = %mathfinal
  531. n529=    unset %math*
  532. n530=    halt
  533. n531=  }
  534. n532=}
  535. n533=/votecheck {
  536. n534=  if $1 == $null { echo 4 $active {I} Voters so far: %votebooth | halt }
  537. n535=  else say {I} Voters so far: %votebooth
  538. n536=  halt
  539. n537=}
  540. n538=/vote {
  541. n539=  set %yes 0
  542. n540=  set %no 0
  543. n541=  enable #votebooth
  544. n542=  set %length $$?1="HowáLong (InáSeconds)?"
  545. n543=  set %votetopic $$?2="Voting Topic..." *3
  546. n544=  if (%length > 30) goto next
  547. n545=  else goto continue
  548. n546=  :next
  549. n547=  set %partlength %length
  550. n548=  dec %partlength 30
  551. n549=  say ---===Voting Time!===---
  552. n550=  timer 1 %partlength /say Voting Topic:  $+ %votetopic $+ 
  553. n551=  timer 1 %partlength /say Only 30 Seconds To Go, Vote Now!
  554. n552=  unset %partlength
  555. n553=  goto continue
  556. n554=  :continue
  557. n555=  timer 1 %length /disable #votebooth
  558. n556=  timer 1 %length /votefinish
  559. n557=  say The Voting Booth Is NOW Open.  $+ %length $+  Seconds to Get Those Votes In.
  560. n558=  say  $+ %votetopic $+ 
  561. n559=  say Type "/ctcp $me YES" to vote YES or "/ctcp $me NO" to vote NO
  562. n560=}
  563. n561=/votefinish {
  564. n562=  say The Votes Have Been Tabulated
  565. n563=  say Results
  566. n564=  say NO's: %no
  567. n565=  say YES's: %yes
  568. n566=  if (%no == %yes) say It's A Tie!
  569. n567=  else if (%no > %yes) say NO Wins!
  570. n568=  else say YES Wins!
  571. n569=  say Participants: %votebooth
  572. n570=  say Thanks For Voting!
  573. n571=  unset %votebooth
  574. n572=  unset %yes
  575. n573=  unset %no
  576. n574=  unset %length
  577. n575=  unset %voteaddy
  578. n576=  unset %votetopic
  579. n577=}
  580. n578=/regtopic /topic # -[( inferno )]- there is no life, when the inferno arrives
  581. n579=/random {
  582. n580=  if ($2 == $null) echo 3 -a {I} Usage: /random [b|p|v|k]
  583. n581=  goto random $+ $1
  584. n582=  :randomb
  585. n583=  ban # $nick($rand(1,$nick(0,#)),#) 3
  586. n584=  goto randomend
  587. n585=  :randomop
  588. n586=  mode # +o $nick($rand(1,$nick(0,#)),#)
  589. n587=  goto randomend
  590. n588=  :randomv
  591. n589=  mode # +v $nick($rand(1,$nick(0,#)),#)
  592. n590=  goto randomend
  593. n591=  :randomk
  594. n592=  inc %kick-ee 1
  595. n593=  kick # $nick($rand(1,$nick(0,#)),#) Randomly Selected Kick \ Kick-ee %# $+ %kick-ee
  596. n594=  goto randomend
  597. n595=  :randomend
  598. n596=  echo 4 Thanx fer using %inferno
  599. n597=}
  600. n598=/itop /topic # -[( $$?="What's da topic?" )]-
  601. n599=/inferno /j ª╤F╦R╤╒
  602. n600=/rq /quit $read c:\inferno\extras\randomq.txt
  603. n601=/rk2 {
  604. n602=  if ($1 == $null) echo 5 -a {I} Usage: /rk2 <NICK> | halt
  605. n603=  inc %kick-ee 1
  606. n604=  kick # $$1  $+ $read c:\inferno\extras\randomk1.txt $+  like the  $+ $read c:\inferno\extras\randomk2.txt $+  U R!!! \ Kick-ee %# $+ %kick-ee
  607. n605=}
  608. n606=/rk {
  609. n607=  if ($1 == $null) echo 5 -a {I} Usage: /rk <NICK> | halt
  610. n608=  inc %kick-ee 1
  611. n609=  kick # $$1 $read c:\inferno\extras\randomk.txt \ Kick-ee %# $+ %kick-ee
  612. n610=}
  613. n611=/tb { 
  614. n612=  if ($1 == $null) echo 5 -a {I} Usage: /tb <NUMBER OF SECONDS> <NICK> <REASON>
  615. n613=  ban -u $+ $$1 # $$2  3 
  616. n614=  %bantime = $$1 / 60
  617. n615=  %bann = %bantime * 60
  618. n616=  %bannit = $$1 - %bann
  619. n617=  kick # $$2 [-Temp Ban: %bantime Minutes - %bannit Seconds : $+ *3 $+ -]
  620. n618=  unset %ban*
  621. n619=}
  622. n620=/w {
  623. n621=  if ($1 == $null) echo 5 -a {I} Usage: /w <NICK>   
  624. n622=  if $2 = -s { set %whois /msg # }
  625. n623=  else { set %whois echo 4 $active }
  626. n624=  whois $$1
  627. n625=}
  628. n626=/leet /run leetpad $$dir="Any phile in particular?" [ $mircdir $+ \extras\ ]
  629. n627=/leetnew /run leetpad
  630. n628=/fakeopall {
  631. n629=  fakeop
  632. n630=  fakeop2
  633. n631=  fakeop3
  634. n632=}
  635. n633=/fakeop3 {
  636. n634=  join #warez-_-sitesá@#hackingá@#warezXDCCá@#midiá@#wavsá@#warez911
  637. n635=}
  638. n636=/fakeop2 {
  639. n637=  join #PSXá@#Playstationá@#SEGAá@#HTMLá@#WWW
  640. n638=}
  641. n639=/fakeop {
  642. n640=  join #mIRCá@#exceedá@#xnetá@#m8leechá@#hacká@#sexá@#cybersexá@#N64
  643. n641=}
  644. n642=/tb2 {
  645. n643=  titlebar \_╕,-ñ┤»`ñ-,╕_╕,-ñ┤»`ñ-,╕_/ mIRC \_╕,-ñ┤»`ñ-,╕_╕,-ñ┤»`ñ-,╕_/
  646. n644=  halt
  647. n645=}
  648. n646=/wt {
  649. n647=  set %pluginfo *1
  650. n648=  set %plugchan #
  651. n649=  set %plugact $active
  652. n650=  play -c %plugact c:\inferno\plugins\wt.plg
  653. n651=}
  654. n652=/wme /w $me
  655. n653=/dnme /dns $me
  656. n654=/pa {
  657. n655=  echo 4 Enter announcement: $$?="What's Da Announcement"
  658. n656=  say -[( $+ # Public Announcement )]-
  659. n657=  say -[( $+ $$! $+ )]-
  660. n658=  say ááááááááááá      -[( ª╤F╦R╤╒ )]-
  661. n659=}
  662. n660=/nin64 /j Nintendo64 | /j Nintendo
  663. n661=/encrypt {
  664. n662=  if ($1 == $null) echo 5 -a {I} Usage: /encrypt <TEXT TO ENCRYPT>
  665. n663=  set %encrypt *1
  666. n664=  %encrypt = $replace(%encrypt,.,í)
  667. n665=  %encrypt = $replace(%encrypt,?,╢)
  668. n666=  %encrypt = $replace(%encrypt,!,╗)
  669. n667=  %encrypt = $replace(%encrypt,a,`)
  670. n668=  %encrypt = $replace(%encrypt,b,Ñ)
  671. n669=  %encrypt = $replace(%encrypt,c,ú)
  672. n670=  %encrypt = $replace(%encrypt,d,½)
  673. n671=  %encrypt = $replace(%encrypt,e,⌠)
  674. n672=  %encrypt = $replace(%encrypt,f,τ)
  675. n673=  %encrypt = $replace(%encrypt,g,ñ)
  676. n674=  %encrypt = $replace(%encrypt,h,φ)
  677. n675=  %encrypt = $replace(%encrypt,i,ó)
  678. n676=  %encrypt = $replace(%encrypt,j,¼)
  679. n677=  %encrypt = $replace(%encrypt,k,µ)
  680. n678=  %encrypt = $replace(%encrypt,l,⌐)
  681. n679=  %encrypt = $replace(%encrypt,m,«)
  682. n680=  %encrypt = $replace(%encrypt,n,σ)
  683. n681=  %encrypt = $replace(%encrypt,o,║)
  684. n682=  %encrypt = $replace(%encrypt,p,│)
  685. n683=  %encrypt = $replace(%encrypt,q,ô)
  686. n684=  %encrypt = $replace(%encrypt,r,▓)
  687. n685=  %encrypt = $replace(%encrypt,s,▒)
  688. n686=  %encrypt = $replace(%encrypt,t,╡)
  689. n687=  %encrypt = $replace(%encrypt,u,╜)
  690. n688=  %encrypt = $replace(%encrypt,v,ª)
  691. n689=  %encrypt = $replace(%encrypt,w,╖)
  692. n690=  %encrypt = $replace(%encrypt,x,δ)
  693. n691=  %encrypt = $replace(%encrypt,y,▀)
  694. n692=  %encrypt = $replace(%encrypt,z,Σ)
  695. n693=  say {I} %encrypt
  696. n694=  unset %encrypt
  697. n695=}
  698. n696=/decrypt {
  699. n697=  if ($1 == $null) { echo 5 -a {I} Usage: /decrypt [-s] <ENCRYPTED TEXT> | halt }
  700. n698=  if $1 == -s { set %decrypt *2 } 
  701. n699=  else set %decrypt *1
  702. n700=  %decrypt = $replace(%decrypt,í,.)
  703. n701=  %decrypt = $replace(%decrypt,╢,?)
  704. n702=  %decrypt = $replace(%decrypt,╗,!)
  705. n703=  %decrypt = $replace(%decrypt,`,a)
  706. n704=  %decrypt = $replace(%decrypt,Ñ,b)
  707. n705=  %decrypt = $replace(%decrypt,ú,c)
  708. n706=  %decrypt = $replace(%decrypt,½,d)
  709. n707=  %decrypt = $replace(%decrypt,⌠,e)
  710. n708=  %decrypt = $replace(%decrypt,τ,f)
  711. n709=  %decrypt = $replace(%decrypt,ñ,g)
  712. n710=  %decrypt = $replace(%decrypt,φ,h)
  713. n711=  %decrypt = $replace(%decrypt,ó,i)
  714. n712=  %decrypt = $replace(%decrypt,¼,j)
  715. n713=  %decrypt = $replace(%decrypt,µ,k)
  716. n714=  %decrypt = $replace(%decrypt,⌐,l)
  717. n715=  %decrypt = $replace(%decrypt,«,m)
  718. n716=  %decrypt = $replace(%decrypt,σ,n)
  719. n717=  %decrypt = $replace(%decrypt,║,o)
  720. n718=  %decrypt = $replace(%decrypt,│,p)
  721. n719=  %decrypt = $replace(%decrypt,,q)
  722. n720=  %decrypt = $replace(%decrypt,▓,r)
  723. n721=  %decrypt = $replace(%decrypt,▒,s)
  724. n722=  %decrypt = $replace(%decrypt,╡,t)
  725. n723=  %decrypt = $replace(%decrypt,╜,u)
  726. n724=  %decrypt = $replace(%decrypt,ª,v)
  727. n725=  %decrypt = $replace(%decrypt,╖,w)
  728. n726=  %decrypt = $replace(%decrypt,δ,x)
  729. n727=  %decrypt = $replace(%decrypt,▀,y)
  730. n728=  %decrypt = $replace(%decrypt,Σ,z)
  731. n729=  if $1 == -s { say {I} %decrypt } 
  732. n730=  else echo 4 {I} %decrypt
  733. n731=  unset %decrypt
  734. n732=}
  735. n733=/noticetop /topic # [ $+ $$?="What here-╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢" $+ ] ╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢ # ╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢ [ $+ $$?="╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢-What here" $+ ]
  736. n734=/tq /quit I wasted %hours hours and %minutes minutes of my life here you know!
  737. n735=/rev {
  738. n736=  if ($1 == $null) echo 5 -a {I} Usage: /rev <TEXT TO REVERSE>
  739. n737=  set %rev *1 | set %rev $replace(%rev,$chr(32),^-) | set %lentest $len(%rev)
  740. n738=  :loop
  741. n739=  set %say %say $right(1,%rev) | dec %lentest | set %rev $left(%lentest,%rev)  
  742. n740=  if (%lentest != 0) { goto loop }
  743. n741=  set %say $replace(%say,^,$chr(32)) | set %say $remove(%say,$chr(32)) | set %say $replace(%say,-,$chr(32)) | say  [ [ %say ] ] | unset %say
  744. n742=}
  745. n743=/massdeop {
  746. n744=  if ($1 == $null) echo 5 -a {I} Usage: /massdeop <NICK1-12>
  747. n745=  mode # -o $$1 $2 $3 $4
  748. n746=  mode # -o $$5 $6 $7 $8
  749. n747=  mode # -o $$9 $10 $11 $12
  750. n748=}
  751. n749=/topic7 /topic # \_╕,-ñ┤»`ñ-,╕_╕,-ñ┤»`ñ-,╕_/ # \_╕,-ñ┤»`ñ-,╕_╕,-ñ┤»`ñ-,╕_/
  752. n750=/topic6 /topic # »░╣»░╣-»░╣-.»░╣-.╕/ # \╕.-╣░».-╣░»-╣░»╣░»
  753. n751=/topic5 /topic # ╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢ # ╢╫-'▓╖╗╕/⌐\╕½╖▓'-╫╢
  754. n752=/topic4 /topic #  ░║╗º½║░║╗º½║░║╗º½║░ # ░║╗º½║░║╗º½║░║╗º½║░
  755. n753=/topic3 /topic # ^'╖.╕.╖'^'╖.╕.╖'^-] # [-^'╖.╕.╖'^'╖.╕.╖'^
  756. n754=/topic2 /topic # »`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.-> ⌐ # ⌐ <-.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»
  757. n755=/topic1 /topic # ,-░^\-░^\░^\^\ # /^/^░/^░-/^░-,
  758. n756=/shifts /topic # ---===]}> The $$?="Which shift" Shift! <{[===---
  759. n757=/a /guser $$?="What Level" $$?="What Person" 3
  760. n758=/takeover /echo 4 {I} Takeover of # is now initiated.  All PPL Who Try to Join Will Be Kicked. | /mode # +iksm dbb546-{\fn | /enable #takeover
  761. n759=/take-OVER /echo 4 {I} Takeover of # is now disabled. | /mode # +tn -kims dbb546-{\fn | /disable #takeover
  762. n760=/nickflood /timer 3 5 /shitnick
  763. n761=/shitnick /nick $r(a,z) $+ $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(a,z)
  764. n762=/oreset /timer1 off | /timer2 off | /timer3 off | /set %minutes 0 | /set %hours 0
  765. n763=/online /echo 4 {I} You've been online for $duration(%online)
  766. n764=/saykick /auser 45 $$1 3
  767. n765=/in /ame is using ª╤F╦R╤╒ by R-66Y and [eXo] -[( there is no life, when the inferno arrives )]-
  768. n766=/i-n /me is using ª╤F╦R╤╒ by R-66Y and [eXo] -[( there is no life, when the inferno arrives )]-
  769. n767=/inf /amsg ª╤F╦R╤╒ v1.2b2 by R-66Y and [eXo] | /amsg -[( there is no life, when the inferno arrives )]-
  770. n768=/i-nf /say ª╤F╦R╤╒ v1.2b2 by R-66Y and [eXo] | /say -[( there is no life, when the inferno arrives )]-
  771. n769=/look /timer 0 350 /ame is looking for $$?="UR looking for <BLAH>." $+ .  Please MSG $me $+ .
  772. n770=/p /part #$1
  773. n771=/j /set %synch on | /set %synch2 $ticks | /join #$1
  774. n772=/i /invite $$1 #$2
  775. n773=/nt /notify $$1
  776. n774=/v /ctcp $$1 VERSION
  777. n775=/pg /ctcp $$1 PAGE
  778. n776=/pi /ctcp $$1 PING
  779. n777=/uc /ctcp $$1 UWHO
  780. n778=/n /names #$1
  781. n779=/h /join #$1 | /part #$1
  782. n780=/rh /part #$1 | /join #$1
  783.